home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Development / AmigaTalk / prelude / DependentsCollection.p < prev    next >
Text File  |  2004-01-31  |  3KB  |  59 lines
  1. pTempVar <- <primitive 110 8 >
  2. <primitive 112 pTempVar 1  " updateRequest: " \
  3.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r02 16r0B 16r20 16r22 16rB1 16r21 \
  4.         16r81 16r00 16rF6 16r02 16r5C 16rF4 16rF3 16rB3 16rF2 16r5B \
  5.         16rF3 16rF5] \
  6.     #( #updateRequest:  )) >
  7.  
  8. <primitive 112 pTempVar 2  " updateRequest " \
  9.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r01 16r0A 16r20 16r21 16rB1 16r80 \
  10.         16r00 16rF6 16r02 16r5C 16rF4 16rF3 16rB3 16rF2 16r5B 16rF3 \
  11.         16rF5] \
  12.     #( #updateRequest  )) >
  13.  
  14. <primitive 112 pTempVar 3  " update:with:from: " \
  15.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r04 16r09 16r20 16r24 16rB1 16r21 \
  16.         16r22 16r23 16r83 16r00 16rF3 16rB3 16rF2 16rF5] \
  17.     #( #update:with:from:  )) >
  18.  
  19. <primitive 112 pTempVar 4  " performUpdate:with: " \
  20.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r03 16r08 16r20 16r23 16rB1 16r21 \
  21.         16r22 16r82 16r00 16rF3 16rB3 16rF2 16rF5] \
  22.     #( #perform:with:  )) >
  23.  
  24. <primitive 112 pTempVar 5  " performUpdate: " \
  25.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r02 16r07 16r20 16r22 16rB1 16r21 \
  26.         16r81 16r00 16rF3 16rB3 16rF2 16rF5] \
  27.     #( #perform:  )) >
  28.  
  29. <primitive 112 pTempVar 6  " asDependentsWithout: " \
  30.   #( #[ 16r20 16rA3 16r74 16r24 16r52 16rC9 16rF7 16r1E 16r20 16r51 16rB1 \
  31.         16r21 16rB6 16rF7 16r06 16r20 16r52 16rB1 16rF3 16rF8 16r11 \
  32.         16rF2 16r20 16r52 16rB1 16r21 16rB6 16rF7 16r06 16r20 16r51 \
  33.         16rB1 16rF3 16rF8 16r03 16rF2 16r20 16rF3 16rF2 16r20 16rA4 \
  34.         16r24 16r51 16rC1 16rB0 16r72 16r51 16r75 16r25 16r24 16rC9 \
  35.         16rFB 16r07 16r20 16r25 16rB1 16r73 16r23 16r21 16rB6 16rF6 \
  36.         16r0D 16r22 16r25 16r23 16rD0 16rF2 16r25 16r51 16rC0 16rF1 \
  37.         16r75 16rF2 16rF9 16r1B 16rF2 16r25 16r24 16rC9 16rF7 16r10 \
  38.         16r20 16r24 16rB1 16r21 16rB6 16rF7 16r04 16r22 16rF3 16rF8 \
  39.         16r03 16rF2 16r20 16rF3 16rF8 16r0F 16rF2 16r22 16r25 16r24 \
  40.         16r51 16rC1 16r20 16r25 16r51 16rC0 16r84 16r00 16rF2 16r22 \
  41.         16rF3 16rF2 16rF5] \
  42.     #( #replaceFrom:to:with:startingAt:  )) >
  43.  
  44. <primitive 112 pTempVar 7  " asDependentsWith: " \
  45.   #( #[ 16r20 16r21 16r81 16r00 16rF3 16rF5] \
  46.     #( #grow:  )) >
  47.  
  48. <primitive 112 pTempVar 8  " asDependentsAsCollection " \
  49.   #( #[ 16r20 16rF3 16rF5] \
  50.     #(  )) >
  51.  
  52. <primitive 98 #DependentsCollection \
  53.   <primitive 97 #DependentsCollection #Array #AmigaTalk:General/DependentsCollection.st \
  54.    #(  ) \
  55.    #( #updateRequest: #updateRequest #update:with:from: #performUpdate:with:  \
  56.        #performUpdate: #asDependentsWithout: #asDependentsWith: #asDependentsAsCollection  ) \
  57.   pTempVar 6 7 > #ordinary >
  58.  
  59.